home *** CD-ROM | disk | FTP | other *** search
/ Chip 2000 July / CHIP Turkiye Temmuz 2000.iso / prog / share / 02 / ARCHIVE.Z / PDF Format.aip / PSPROCSET / 3 < prev    next >
Text File  |  1998-09-17  |  697b  |  26 lines
  1. %%BeginFile: pdfutil.prc
  2. %%Copyright: Copyright 1993 Adobe Systems Incorporated. All Rights Reserved.
  3. /bd {bind def} bind def
  4. /ld {load def} bd
  5. /dd { PDFVars 3 1 roll put } bd
  6. /xdd { exch dd } bd
  7. /Level2?
  8. systemdict /languagelevel known
  9. { systemdict /languagelevel get 2 ge } { false } ifelse
  10. def
  11. /Level3?
  12. systemdict /languagelevel known
  13. {systemdict /languagelevel get 3 eq}{false}ifelse
  14. def
  15. /here {
  16. dup currentdict exch known
  17. { currentdict exch get true }
  18. { pop false }
  19. ifelse
  20. } bd
  21. /isdefined? { where { pop true } { false } ifelse } bd
  22. /StartLoad { dup dup not { /_save save dd } if } bd
  23. /EndLoad { if not { _save restore } if } bd
  24. /npop { { pop } repeat } bd
  25. %%EndFile
  26.